Namespace CNG
    Public Class TipoArea
        Public Shared Function ListadoTipoArea() As DataTable

            Dim Comando As New CAD.TipoArea.TipoArea_SELECT(CAD.BaseDatos.Conexion)
            Dim Tabla As New DataTable


            Comando.LoadTable(Tabla)

            Return Tabla

        End Function

    End Class
End Namespace
